results %>%
count(athlete_name, name = "Number of Parkruns")
## # A tibble: 6 × 2
## athlete_name `Number of Parkruns`
## <chr> <int>
## 1 Bella 38
## 2 George 2
## 3 Kat 15
## 4 Lucia 12
## 5 Matt 72
## 6 Zach 30